home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 038a / pdatb503.zip / MIXED.DEF < prev    next >
Text File  |  1991-07-03  |  3KB  |  54 lines
  1. ' MIXED.DEF     this is a set of prototype declarations for the procedures
  2. '               which are included in the MIXED-LANGUAGE TOOLBOX. Include
  3. '               only the routines which you intend to use in your code.
  4. '
  5. '   Author:     Christy Gemmell
  6. '   For:        Mixed-Language Toolbox for QuickBASIC
  7. '   Version:    5.20
  8. '   Date:       25/5/1991
  9. '
  10. '   Compatible with QuickBASIC 4.x, Extended QuickBASIC and BASIC 7.
  11. '
  12. '   The following prototypes refer to external procedures which are in
  13. '   the library files MIXED.LIB and MIXED.QLB. One or other of these
  14. '   libraries must be linked to the program which calls them.
  15. '
  16. '   ******* Note that ATTRIBUTE% is now in the TOOLBOX Library ****************
  17. '
  18.     DECLARE FUNCTION BinDec& (Binary$)
  19.     DECLARE FUNCTION BitTest% (Number%, Bit%)
  20.     DECLARE FUNCTION Centre$ (Text$, MaxWidth%)
  21.     DECLARE FUNCTION DateInput$ (Default$, Context%, Topic$, HotKey%)
  22.     DECLARE FUNCTION DaysBetween& (Date1$, Date2$)
  23.     DECLARE FUNCTION DecBin$ (Decimal&)
  24.     DECLARE FUNCTION DosVersion$ ()
  25.     DECLARE FUNCTION FindFile$ (FileSpec$)
  26.     DECLARE FUNCTION GetFlag% (Flag%)
  27.     DECLARE FUNCTION GrAttrib% (ForeGround%, BackGround%)
  28.     DECLARE FUNCTION IsDir% (Test$)
  29.     DECLARE FUNCTION LegalName% (FileSpec$)
  30.     DECLARE FUNCTION LineUp$ (Num#, Places%, Comma%, Length%, Currency$)
  31.     DECLARE FUNCTION LongDate$(Day%, Month%, Year%)
  32.     DECLARE FUNCTION Match% (Start%, Search$, Pattern$)
  33.  
  34. '   ******* Note that REVINPUT now has an extra MASK% parameter ***************
  35. '
  36.     DECLARE FUNCTION RevInput$ (Max%, Default$, Ctx%, Topic$, Mask%, HotKey%)
  37.     DECLARE FUNCTION Round$ (Number#, Places%)
  38.     DECLARE FUNCTION ScreenMode% ()
  39.  
  40.     DECLARE SUB BarMenu (P1%, P2%, P3%, Menu$(), P5%, P6%, P7%, P8$, Mouse%)
  41.     DECLARE SUB BitReSet (Number%, Bit%)
  42.     DECLARE SUB BitSet (Number%, Bit%)
  43.     DECLARE SUB CheckPrinter (Printer%, Ready%)
  44.     DECLARE SUB Panel (Row%, Col%, Rows%, Cols%, Border%, Attr%)
  45.     DECLARE SUB SetFlag (Flag%, Setting%)
  46.     DECLARE SUB SortFile (PathName$, OffSet%, FieldLen%, RecordLen%, Done%)
  47.     DECLARE SUB VerMenu (P1%, P2%, P3%, P4%, P5%, P6$, Menu$(),_
  48.                          P8%, P9%, P10%, P11%, P12$, Mouse%)
  49.     DECLARE SUB VideoMode (Colour%, MaxRes%, VideoRam%)
  50.  
  51. ' ┌────────────────────────────────────────────────────────────────────────┐
  52. ' │     (c) 1988,1990,1991 By Christy Gemmell and Singular SoftWare        │
  53. ' └────────────────────────────────────────────────────────────────────────┘
  54.